home *** CD-ROM | disk | FTP | other *** search
/ SGI Developer Toolbox 6.1 / SGI Developer Toolbox 6.1 - Disc 4.iso / src / tutorials / geometer / Theorems / curves / witchofagnesi.T < prev   
Encoding:
Text File  |  1994-08-02  |  662 b   |  18 lines
  1. .geometry "version 0.1";
  2. v1 = .free(-0.668478, -0.644022, .invisible, .L0, "1");
  3. v2 = .free(0.891304, -0.644022, .invisible, .L0, "2");
  4. l1 = .l.vv(v1, v2, .L0, .longline);
  5. v3 = .vonl(l1, 0.0652174, -0.644022, .L0, .cross);
  6. l2 = .l.vlperp(v3, l1, .L0);
  7. v4 = .vonl(l2, 0.0652174, -0.203804, .L0, .cross);
  8. c1 = .c.vv(v4, v3, .L0);
  9. v5 = .free(-0.0788732, 0.388732, .L0, "3");
  10. l3 = .l.vv(v3, v5, .L0);
  11. v7 = .v.lc(l2, c1, 1, .L0, .plus);
  12. l4 = .l.vlperp(v7, l2, .L0, .longline);
  13. v9 = .v.lc(l3, c1, 2, .L0, .plus);
  14. v10 = .v.ll(l3, l4, .L0, .plus);
  15. l5 = .l.vlperp(v10, l4, .L0, .longline);
  16. l6 = .l.vlperp(v9, l5, .L0, .longline);
  17. v11 = .v.ll(l5, l6, .smear, .L0, .plus);
  18.